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SWIPC GT-6144 Graphics Diagnostic BARTST-1 


The BARTST diagnostic program is designed to operate in a SWIPC 6800 com- 
puter and will help in locating problems in a GT-6144 graphics terminal. The | 
program uses $$C91¢ words of memory and starts at location #66016 and may be 


_stored on tape or loaded in from the terminal instruction by instruction using 


MIKBUG * . When loading the program, the program counter locations A48 and 
A#49. should be set to $016. The program assumes that the parallel interface 
‘board in the computer is in the #3 interface slot. 


The program itself has several test functions. After initiating the pro- 
gram.the first thing done is to erase the terminal's memory. This can be veri-~ 


_ fied if you have the screen in the UNBLANKED condition - going from left to 


right the screen should go black in a period of about 0.5 seconds. After. the 
erase is over the screen should fill with 32 vertical bars starting at hori- 
zontal location $. After the vertical bars appear the screen blanking/reversing 


functions can be checked by typing in the appropriate number from 1 - 6 on your 
keyboard. 


aeecartanas cranes REVERSE SCREEN (black on white) 
2 --an nn --- NORMAL SCREEN (white on black) 
: ecru BLANK CT-1024 (if used) 

s iabeieacieiearscamarta et iiss ENABLE CT-1024 (if used) 

ae a eae ENABLE GRAPHICS 

ee aca BLANK GRAPHICS 


The BARTST program can be modified to test odd numbered vertical bars and 
odd and even horizontal bars. When using the modifications below be sure to. 
reload the program in its original form and then make the modifications. In 


' all cases the program counter should be set to $16. 


CHANGE TO 
ODD VERTICAL BARS - 0058 Al 
gO5D 81 
EVEN HORIZONTAL BARS 0071 7c 
0672 OO 
$073 59 
GH7D Gl 
OO7TE M1 
OO7F an 
ODD HORIZONTAL BARS 6071 7C 
9O72 Ad 
$073 59 
007D aa 
OO7E gi 
OO7F al 
$059 pi 
9G66 61 
6677 *  @l 
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0000 

0001 

code 
0CC3 
0004 
OCOS 
6C06 
COC7 
0008 
C009 
SO0A 
OOCE 
O0OC 
oocD 
OOCE 
OOOF 
C010 
0011 

0012 
0013 
0014 
cols 
OO16 
C017 
001s 
0015 
OOlA 
0015 
0C1C 
oo1D 
OO1E 
O01F 
0020 
0cel 
o0ee 
0023 
0024 
0025 
C026 
C627 
0028 
0029 
002k 
0025 
002C 
002D 
00eE 
O02F 
9030 
0031 
0032 
C033 
0034 
0035 
0036 
0037 
0038 


OUTCH: 


OVER: 


INCREM: 


PARADRMSB 
PARADRLSB 
PARADRLSB 


LDX 


STA A 
LDA B 
STA B 
LDA B 
LDA B 
STA B 


RTS 
LDA A 


STA A 


LDX 


LDA B 
STA B 
LDA B 
STA B 
EHPOS 
EVPOS 
LDA A 
CMP 


BEQ 


JSR 


0,X 
#$37 
1,x 
$,X 
#S$3F 


1,X 


#$3C 


#$8007 


PARADRMSB 


#SFF 
#,X 
#$3F 


1,X 


EHPOS 


#S40 


OUT 


OUTCH 


LDA A EVPOS 


CMP 
BEQ 


ADD 


#360 
SPEC 


$86 
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S039 
OC3SA 
COSB 
CO3C 
003D 
OO3E 
OO3F 
CO40 
C041 
0042 
CCAS 
CO44 
0045 
C046 
0047 
CC4E 
CO49 
OO44 
OO4AE 
OO4C 
OO4D 
OO4E 
OG4F 
0050 
0051 
0052 
0053 
CO54 
C055 
0056 
0057 
CO5S 
0C59 
C054 
OC5E 
OC5C 
OC5Db 
DOSE 
OC5F 
oC 66 
0061 
0062 
6063 
0064 
OC65 
OC66 
0067 
0068 
0069 
OO6A 
OC 65 
CO6C 
O0é6B 
CC6E 
CC6F 
C079 
C071 


“y 


APNMVOOONNMM RM iw 


01 


SKP: 


INCREM1: 


JSR 


INC 


NOP 


OUTCH 
EVPOS  ( 


INCREM 


#800 


EVPOS | 


EHPOS 


OVER 


#309 
EHPOS 
EVPOS: 
#9E4 


OUTCH 


SKP 


BHPOS 
#$49 
ouT1 


OUTCH 


VPOS 
#560 
SPEC1 
#$89 


OUTCH 


BVPOS 


4 
ON 
a 
fone 
oe 


NO7E C1 NOP OGAB & LDA A #SE1 
007s C1 NOP COAC EI 

0074 £6 BRA INCREM1 QOAD 20 BRA OUTI1 
OO75 Eb COAE 16 ; a4 

CO76 && SPECI: LDA A #6¢ OOAF &6. THREE: LDA A #SE2 
0077 OG SOBO. Fe |. 

0078. 97 STA A BHPOS OOB! 20 BRA OUT1 
9079 59 00OBe 12 ; ; 
OO7A 7C INC BVPOS COBS S6 FOUR: LDA A #SE3. 
oCc7Lb OO COR4 E83 

c07C 58 OCES 20 BRA OUT1 
O07D 7C ING BHPOS ., 0026 OF . 

OC7TE CO CCL7 &6 FIVE: “LDA A. #SE4 
OC7F 5g OOES EA 

COEO 20 BRA SKP OOB9 2 BRA OUT1 
oCSl DS OOBA OA 

OC&2 BL OVER: JSR INEEE OOBL S6 SIX: LDA A #SE5 
COoS KI OOEC E5 

OO84 AC COED & BRA OUT1 
OOES GY CMP A #831 OCCEE 06 

COSé 31 OCEF &6 SEVEN: LDA A #SE6 
0087 27 BEQ ONE OCCO E 

COGS LE OCC! 2c BRA OUTI 
GOES G1 CMP A #832 0OCEe 02 aes 
O0CSh 32 00C3 86 EIGHT; LDA A #SE7_ 
O08r 27 BEQ TWO COC4 E7 3 2 
COSC LE 00C5 EB OUTI; JSR OQUTCH 
COBL 61 CMP A #833 00C6 00 

OOSE 33 O0C7 06 

OOGF 27 BEQ THREE * 00C8 20 BRA OVER 
G90 1k CoCo ES 

2091 61 CMP A #834 

CO9E 34 

9093 27 BEQ FOUR 

0094 IF 

CCos &1 CMP A #$35 

0096 35 

C097 27 BEQ FIVE 

CO9S G1 CMP A #836 

CO9A 36 

OO9n 27 BEQ SIX 

0090 IE 

QCOD 61 CMP A #837 

COGk 27 

COOF 27 BEQ SEVEN 

COLAO LE 

COA! 81 CMP A #$38 

OCA3 27 BEQ EIGHT 

OCHh4 LE 

OCA5 20 BRA OVER 

COAS6 DE 

OCA? &6 ONE: LDA A #SEQ 

OCAS EO 

OCA9 20 BRA OUT1 

OOAR 1A 
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